execquery

Copy Code code as follows: ' Hardware_info.vbs v1.1 By:fastslz On Error Resume Next Dim Wmi,ws,fso Set WMI = GetObject ("winmgmts:{impersonationlevel=impersonate}!\\.\root\cimv2") Set Coss = WMI. ExecQuery ("SELECT * from

Copy codeThe Code is as follows: 'hardware _ Info. vbs v1.1 BY: fastslz On Error Resume Next Dim WMI, WS, Fso Set WMI = GetObject ("Winmgmts: {impersonationLevel = impersonate }! \. \ Root \ cimv2 ") Set cOSs = WMI. ExecQuery ("Select * from

Function fnshowprcname (prcname ){VaR locator = new activexobject ("wbemscripting. swbemlocator ");VaR service = locator. connectserver (".", "/root/cimv2 ");VaR processes = service. execquery ("select * From win32_process ");VaR processenum = new

1. vbs obtains the IP address of the local machine.Strcomputer = "."Set ob1_miservice = GetObject ("winmgmts: \" & strcomputer & "\ Root \ cimv2 ")Set ipconfigset = ob1_miservice. execquery ("select IPaddress fromWin32_networkadapterconfiguration

How to use JavaScript to obtain client computer hardware and system information WMI is used to obtain the hardware and system information of the client computer: Function getSysInfo () {var locator = new ActiveXObject ("WbemScripting. SWbemLocator "

WinXP, Win7, Win8 Copy codeThe Code is as follows: 'indicate the source for reprinting original content and referencing the core part of the code. Hard disk read/write statistics. vbs If (Lcase (Right (Wscript. FullName, 11) = "wscript.exe")

JavaScript access to client computer hardware and system InformationAccess to client computer hardware and system information through WMI: Copy Code code as follows: function Getsysinfo () { var locator = new ActiveXObject

JavaScript gets client computer hardware and system InformationTo obtain client computer hardware and system information through WMI://System Information AcquisitionfunctionGetsysinfo () {varLocator =NewActiveXObject ("WbemScripting.SWbemLocator");

Winxp,win7,win8 Copy Code code as follows: ' Original content reprint, the reference code core part please indicate the source Hard disk read and write statistics. vbs If (Lcase right (wscript.fullname,11) = "Wscript.exe") Then

Logic is simpler, directly on the code Timed delivery uses the win server's timed task to execute the script regularly #coding: Utf-8 __future__ Import Division import PYMSSQL,SYS,DATETIME,XLWT Import smtplib from Email.mime.text Impor T mimetext